home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Online / TASC / Install < prev    next >
Text File  |  1997-09-27  |  3KB  |  121 lines
  1. /*  Quick installation script
  2.     Run this from the same directory as you found it.
  3.     Don't move any of the other files before you run it.
  4. */
  5.  
  6. if open(A,'envarc:thor/thorpath') then do
  7.     THORP=READLN(A)
  8.     call close(A)
  9. end
  10. else do
  11.     say 'Unable to find the file envarc:thor/thorpath. Aborting.'
  12.     exit
  13. end
  14.  
  15. if open(A,'envarc:thor/BBSdatapath') then do
  16.     BBSP=READLN(A)
  17.     call close(A)
  18. end
  19. else do
  20.     say 'Unable to find the file envarc:thor/BBSdatapath. Aborting.'
  21.     exit
  22. end
  23.  
  24.  
  25. address command
  26. /* Install rexx files */
  27. 'copy rexx/#? "'||THORP||'rexx" quiet'
  28.  
  29. /* Install database directory */
  30. 'makedir "'||BBSP||'db"'
  31.  
  32. /* Install Docs */
  33. 'copy docs/#? "'||THORP||'docs" quiet'
  34.  
  35.  
  36. /* Setup the config file */
  37.  
  38. say 'Do you want the message that you are complaining about to automatically'
  39. say 'be deleted when you have constructed your complaint?'
  40. options prompt '(Y/N) '
  41. parse UPPER PULL opt
  42. address command
  43. 'echo "delmsg:'||opt||'" > envarc:thor/TASC.cfg'
  44.  
  45. say ''
  46. say 'Do you want to send all of your complaints with the urgent flag set?'
  47. parse UPPER PULL opt
  48. 'echo "urg:'||opt||'" >>envarc:thor/TASC.cfg'
  49.  
  50. options prompt 'Suggestion - Unwanted Email :'
  51. say ''
  52. say 'What subject would you like to use for complaints about unwanted'
  53. say 'email?'
  54. parse PULL opt
  55. 'echo "mailhd:'||opt||'" >>envarc:thor/TASC.cfg'
  56.  
  57. options prompt 'Suggestion - Usenet spam/mail fraud :'
  58. say ''
  59. say 'What subject would you like to use for complaints about Usenet Spam?'
  60. parse PULL opt
  61. 'echo "newshd:'||opt||'" >>envarc:thor/TASC.cfg'
  62.  
  63. say ''
  64. say 'Do you always want to send your complaint to the postmaster of the'
  65. say 'domain? If you answer N then the name of the recipient will be the title of'
  66. say 'the header line used to find that domain (the email will still be sent to'
  67. say 'the postmasters mailbox).'
  68.  
  69. options prompt '(Y/N) '
  70. parse UPPER PULL opt
  71. 'echo "globPM:'||opt||'" >> envarc:thor/TASC.cfg'
  72.  
  73. say ''
  74. say 'Would you like your complaints to be sent with the from address as'
  75. say 'postmaster@your.domain? You need to have your own domain for this,'
  76. say 'otherwise the replies will go to your ISPs postmaster.'
  77. options prompt 'Your email domain (e.g. toadhall.u-net.com) '
  78. parse PULL opt
  79. 'echo "Postmaster:'||opt||'" >> envarc:thor/TASC.cfg'
  80.  
  81. 'echo "database:spam.db" >>envarc:thor/TASC.cfg'
  82.  
  83. say ''
  84. say 'What domain name does your ISP use to return messages that bounced to you?'
  85. options prompt '(e.g. u-net.net) '
  86. parse PULL opt
  87. 'echo "Bounce:'||opt||'" >>envarc:thor/TASC.cfg'
  88.  
  89. say ''
  90. say 'What is your full domain name?'
  91. options prompt '(e.g. toadhall.u-net.com) '
  92. parse PULL opt
  93. 'echo "Mine:'||opt||'" >>envarc:thor/TASC.cfg'
  94.  
  95. say ''
  96. say 'Do you want to search the message text as well as the headers for'
  97. say 'addresses to complain to?'
  98. options prompt '(Y/N) '
  99. parse UPPER PULL opt
  100. 'echo "SRCHBODY:'||opt||'" >>envarc:thor/TASC.cfg'
  101.  
  102. say ''
  103. say 'Do you want to enable the option to ask for a traceroute to the'
  104. say 'domains that you complain to?'
  105. options prompt '(Y/N) '
  106. parse UPPER PULL opt
  107. 'echo "TRACER:'||opt||'" >>envarc:thor/TASC.cfg'
  108.  
  109. 'echo "TRACETMP:trace" >>envarc:thor/TASC.cfg'
  110. 'echo "TRACEFILE:tracefile.db" >>envarc:thor/TASC.cfg'
  111. 'echo "TRACELEN:3000" >>envarc:thor/TASC.cfg'
  112.  
  113. say ''
  114. say 'A basic TASC config has been set up. Please read the docs when you'
  115. say 'have become more familiar with the program & then edit it by hand to suit'
  116. say 'yourself'
  117.  
  118. exit
  119.  
  120.  
  121.